﻿Public Class Item
    Public etiqueta As String
    Public valor As String

    Public Sub New(ByVal valor As String, ByVal etiqueta As String)
        Me.valor = valor
        Me.etiqueta = etiqueta
    End Sub

    Public Overrides Function ToString() As String
        Return etiqueta
    End Function
End Class
